  hQuery = brMain:QUERY.
  hQuery:SET-BUFFERS(BUFFER wod_det:HANDLE,BUFFER in_mstr:HANDLE,BUFFER pt_mstr:HANDLE,BUFFER wo_mstr:HANDLE) NO-ERROR.

  hQuery:GET-FIRST().
  REPEAT:  
      
      IF hQuery:QUERY-OFF-END THEN LEAVE. 
      
      
      hQuery:GET-NEXT().  

  END.
